-- Written for Daggerfall Unity by Harbinger451
Quest: PROST008
DisplayName: Prostitute yourself to a Commoner
-- Message panels
QRC:

QuestorOffer:  [1000]
<ce>                         I'd gladly pay you for a
<ce>                    feel of that fine body of yours?
                                     <--->
<ce>                Can I hold your body tight against mine?
<ce>                          I'm willing to pay.
                                     <--->
<ce>                   If I said you had a beautiful body
<ce>                     would you hold it against me?
<ce>                            I've got gold.
                                     <--->
<ce>                   %oth, but you're a fit looking %ra.
<ce>              I'd pay good money for a go on that sweet bod!
                                     <--->
<ce>                   Wanna get hot and heavy with me?
<ce>                     I'll pay you for your time.

RefuseQuest:  [1001]
<ce>                Oh well, nothing ventured, nothing gained.
                                     <--->
<ce>                    %oth! I was only joking anyway.
                                     <--->
<ce>                      Ha, I was messing with you.
<ce>               Do I look like someone who has to pay for it?
                                     <--->
<ce>                  You too good for my money, is that it?
                                     <--->
<ce>                   My money not good enough for you, eh?

AcceptQuest:  [1002]
<ce>                  Ha, I knew you were in need of some coin.
                                     <--->
<ce>                 How fantastic, I knew you'd be up for it.
                                     <--->
<ce>                       I'm so glad you said yes?
                                     <--->
<ce>                    Wait? What? You said yes? Result!
                                     <--->
<ce>                   You said yes! What music to my ears!

QuestFail:  [1003]
<ce>                 I didn't have you pegged as a prude, %pcf.
<ce>                   Hope you change your mind sometime.
                                    <--->
<ce>                You didn't strike me as the shy type, %pcf.
<ce>             Oh well, if you change your mind. I'm right here.
                                    <--->
<ce>                   What? I don't have enough gold?
<ce>               Well, someone thinks highly of themselves.
                                     <--->
<ce>                  You too good for my money, is that it?
                                     <--->
<ce>                   My money not good enough for you, eh?

QuestComplete:  [1004]
<ce>                   Thank you for the happy ending, %pcf.
<ce>                       It was worth every penny.
                                     <--->
<ce>                I usually last a lot longer than that, %pcf.
<ce>                  But you were too good a lover for me.
                                     <--->
<ce>                 Well, it's certainly true that you get
<ce>                           what you pay for.
                                     <--->
<ce>                 Good job, %pcf. You earned every penny!
                                     <--->
<ce>                    %oth, that was money well spent!

RumorsPostsuccess:  [1007]
Some talented %ra has started selling their body for some easy cash. People are falling over themselves to get some.
<--->
_qgiver_ paid some hot young %ra to pleasure %g2. Some people will do anything for money these days.
<--->
A good looking young %ra is raking it in apparently. There's no shortage of people willing to buy their favor.
<--->
Apparently, someone called %pcn is the proverbial good time had by all. Oh, wait. That's you. Well hello there, %pcf.

QuestorPostsuccess:  [1008]
My dear, %pcf. You were money well spent indeed.
<--->
I can't stop thinking about you, %pcf. I enjoyed you more than anyone else I've paid for.
<--->
Hey, %pcf, I've spread the word, Now they all want to get their money's worth.

QuestLogEntry:  [1010]
%qdt
_qgiver_ in __qgiver_ of ___qgiver_ 
wants to pay me for a good time.

Message:  1011
%qdt:
_qgiver_ in __qgiver_ of ___qgiver_ paid me
_reward_ gold pieces for a real good time.
Unfortunately, %g1 also left my unmentionables feeling a little itchy.

Message:  1012
<ce>                         Enough of the talking.
<ce>                     I'll pay you _reward_ to get
<ce>                        down and dirty with me.
                                     <--->
<ce>                   I have _reward_ coins for you, %pcf
<ce>                        Now take me, I'm yours.
                                     <--->
<ce>             Now, let's do something we can both be ashamed of.
<ce>                    I'll give you _reward_ gold pieces.
                                     <--->
<ce>                  I have _reward_ gold for you, %pcf
<ce>          Now service me like you've never serviced anyone before.
                                     <--->
<ce>              Now, let's get down to the business of pleasure.
<ce>                   I'll give you _reward_ gold pieces.

Message:  1013
<ce>                               Splendid!
<ce>                                  ...
<ce>                         Don't hold back, %pcf!
<ce>                        I want my money's worth.
<ce>                                  ...
<ce>                       Mmm, yes! Take me! Use me!
<ce>                  %oth! You really know where it's at.
<ce>                                  ...
<ce>                       Oh gods! Oh my! Yes! Yes!
<ce>                                  ...
<ce>                      Do it to me! Yeah, that's it!
<ce>                                  ...
<ce>                       That's the spot. Yes! YES!
<ce>                                  ...
<ce>                                 %oth!
<ce>                        That was SO good, %pcf.
                                     <--->
<ce>                        Right then, lets do the do.
<ce>                         Time is money, afterall.
<ce>                                  ...
<ce>                           Quick, Touch me.
<ce>                           Oh, that's good.
<ce>                                  ...
<ce>                      Caress me. Yeah, that's right.
<ce>                                  ...
<ce>                          There. Yes, there!
<ce>                                  ...
<ce>                           Kiss me! Love me!
<ce>                                  ...
<ce>                               Oooh! Aaah!
<ce>                                  ...
<ce>                                 %oth!
<ce>                         That was the best ever!

Message:  1014
%qdt:
_qgiver_ in __qgiver_ of ___qgiver_ paid me
_reward_ gold pieces for a real good time.

Message:  1015
<ce>                     Let's get this show on the road!
<ce>                                  ...
<ce>                          Don't hold back, %pcf.
<ce>                                  ...
<ce>                       Mmm, yes! Take me! Use me!
<ce>                               %oth! NO!
<ce>                       This isn't doing it for me!
<ce>                                  ...
<ce>                       You're doing it all wrong!
<ce>                    I'M NOT PAYING FOR THIS FIASCO!
<ce>                                  ...
<ce>                       WHAT DO YOU MEAN, "WHAT ABOUT
<ce>                              YOUR MONEY!"
<ce>                                  ...
<ce>                        ARE YOU THREATENING ME?!

Message:  1016
<ce> You ARE threatening me!
<ce> Well why didn't you say so.
<ce> Thouh it kills me to pay
<ce> for something I didn't get,
<ce> I'm not going to argue and
<ce> die in a fight about it.
<ce> Here's your money

Message:  1017
<ce> I'm not some whimpering simp
<ce> you know. You can't just threaten 
<ce> your way to a pay off, not
<ce> with me. I'll fight to the
<ce> death for what's mine!
<ce> ...
<ce> I'll just go get my sword.
<ce> 
<ce> (_qgiver_ scurries away in a
<ce> panic before you have time to react.)

Message:  1018
<ce> What?!
<ce> Your NOT threatening me?!
<ce> Oh! I'm sorry.
<ce> I got a little carried away there.
<ce> Well, I'm not paying you for services
<ce> not delivered, so to speak.
<ce> So, move along. I have nothing
<ce> further to say.


QBN:

Item _reward_ gold range 111 to 444

Person _qgiver_ group Questor

Foe _spellsword_ is Spellsword

Clock _lovewindow_ 05:00

-- Quest start-up:
    start timer _lovewindow_
    prompt 1012 yes _pcgame_ no _pcprude_ 
    log 1010 step 0 

variable _pcgame_

_lovewindow_ task:
    remove log step 0
    change repute with _qgiver_ by -5 
    end quest

_weak_ task:
	when attribute Personality is at least 0

_even_ task:
	when attribute Personality is at least 40

_strong_ task:
	when attribute Personality is at least 60

_verystrong_ task:
	when attribute Personality is at least 80

_worstchance_ task:
	when _weak_ and not _even_

_evenchance_ task:
	when _even_ and not _strong_

_goodchance_ task:
	when _strong_ and not _verystrong_

_bestchance_ task:
	when _verystrong_

_chance1_ task:
	when _pcgame_ and _worstchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex2_

_chance2_ task:
	when _pcgame_ and _evenchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_chance3_ task:
	when _pcgame_ and _goodchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_chance4_ task:
	when _pcgame_ and _bestchance_
	pick one of _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex1_ _sex2_

_sex1_ task:
    pick one of _pcinfect1in3_ _pcclear_ _pcclear_

_pcinfect1in3_ task:
    pick one of _pcinfect1in9_ _pcclear_ _pcclear_

_pcinfect1in9_ task:
    pick one of _pcinfect1in27_ _pcclear_ _pcclear_

_pcinfect1in27_ task:
    pick one of _pox_ _pox_ _leprosy_ _plague_

_pox_ task:
    say 1013
    train pc Streetwise
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Witches'_Pox
    end quest

_leprosy_ task:
    say 1013
    train pc Streetwise
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Leprosy
    end quest

_plague_ task:
    say 1013
    train pc Streetwise
    give pc _reward_
    remove log step 0
    log 1011 step 1
    make pc ill with Plague
    end quest

_pcclear_ task:
    say 1013
    train pc Streetwise
    give pc _reward_
    remove log step 0
    log 1014 step 1
    end quest

_pcprude_ task:
    say 1003
    remove log step 0
    end quest

_sex2_ task:
    prompt 1015 yes _yesviolence_ no _noviolence_

_yesviolence_ task:
    pick one of _nonviolent_ _nonviolent_ _violent_

_nonviolent_ task:
    say 1016
    get item _reward_
    change repute with _qgiver_ by -5
    remove log step 0
    end quest

_violent_ task:
    say 1017
    hide npc _qgiver_
    change repute with _qgiver_ by -5
    pick one of _fight_ _nofight_

_fight_ task:
    create foe _spellsword_ every 0 minutes 1 times with 100% success
    remove log step 0 
    end quest

_nofight_ task:
    remove log step 0 
    end quest

_noviolence_ task:
    say 1018
    remove log step 0
    end quest
